object Options: TOptions Left = 455 Top = 351 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Options' ClientHeight = 199 ClientWidth = 488 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object RadioGroup1: TRadioGroup Left = 8 Top = 96 Width = 233 Height = 97 Caption = 'Display Format' Items.Strings = ( 'Explicit (1 hour, 13 minutes, 12 seconds)' 'Abbreviated (1 hr, 13 min, 12 sec)' 'Condensed (1:13:12)') TabOrder = 0 end object GroupBox2: TGroupBox Left = 8 Top = 0 Width = 233 Height = 89 Caption = 'Font' TabOrder = 1 object Label1: TLabel Left = 16 Top = 64 Width = 75 Height = 13 Caption = 'Actual font size:' end object Panel2: TPanel Left = 8 Top = 16 Width = 217 Height = 41 Caption = 'abcABC123$%&&' TabOrder = 0 OnClick = Panel2Click end end object Button1: TButton Left = 328 Top = 168 Width = 75 Height = 25 Caption = 'OK' Default = True TabOrder = 2 OnClick = Button1Click end object Button2: TButton Left = 408 Top = 168 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' TabOrder = 3 OnClick = Button2Click end object Event: TGroupBox Left = 248 Top = 0 Width = 233 Height = 161 Caption = 'Event' TabOrder = 4 object Label2: TLabel Left = 8 Top = 16 Width = 28 Height = 13 Caption = 'Name' end object Month: TLabel Left = 8 Top = 56 Width = 30 Height = 13 Caption = 'Month' end object Day: TLabel Left = 96 Top = 56 Width = 19 Height = 13 Caption = 'Day' end object Year: TLabel Left = 168 Top = 56 Width = 22 Height = 13 Caption = 'Year' end object Label3: TLabel Left = 8 Top = 96 Width = 23 Height = 13 Caption = 'Time' end object Label4: TLabel Left = 43 Top = 116 Width = 3 Height = 14 Caption = ':' Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Edit1: TEdit Left = 8 Top = 32 Width = 217 Height = 21 TabOrder = 0 end object ComboBox1: TComboBox Left = 8 Top = 72 Width = 81 Height = 21 ItemHeight = 13 Items.Strings = ( 'January' 'February' 'March' 'April' 'May' 'June' 'July' 'August' 'September' 'October' 'November' 'December') TabOrder = 1 Text = 'ComboBox1' end object ComboBox2: TComboBox Left = 96 Top = 72 Width = 65 Height = 21 ItemHeight = 13 Items.Strings = ( '1' '2' '3' '4' '5' '6' '7' '8' '9' '10' '11' '12' '13' '14' '15' '16' '17' '18' '19' '20' '21' '22' '23' '24' '25' '26' '27' '28' '29' '30' '31') TabOrder = 2 Text = 'ComboBox2' end object Edit2: TEdit Left = 168 Top = 72 Width = 57 Height = 21 TabOrder = 3 end object Edit3: TEdit Left = 8 Top = 112 Width = 33 Height = 21 TabOrder = 4 end object Edit4: TEdit Left = 48 Top = 112 Width = 33 Height = 21 TabOrder = 5 end object RadioButton1: TRadioButton Left = 88 Top = 114 Width = 113 Height = 17 Caption = 'AM' TabOrder = 6 OnClick = RadioButton1Click end object RadioButton2: TRadioButton Left = 128 Top = 114 Width = 49 Height = 17 Caption = 'PM' TabOrder = 7 OnClick = RadioButton2Click end end object CheckBox1: TCheckBox Left = 256 Top = 136 Width = 97 Height = 17 Caption = 'Start with clock' TabOrder = 5 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 336 Top = 264 end end